home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Magazine / Online / QMail / source / readsubdir.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-04-15  |  1.0 KB  |  50 lines
  1. #include "readsubdir.h"
  2. #include "fmt.h"
  3. #include "scan.h"
  4. #include "str.h"
  5. #include "auto_split.h"
  6.  
  7. void readsubdir_init(rs,name,pause)
  8. readsubdir *rs;
  9. char *name;
  10. void (*pause)();
  11. {
  12.  rs->name = name;
  13.  rs->pause = pause;
  14.  rs->dir = 0;
  15.  rs->pos = 0;
  16. }
  17.  
  18. static char namepos[FMT_ULONG + 4 + READSUBDIR_NAMELEN];
  19.  
  20. int readsubdir_next(rs,id)
  21. readsubdir *rs;
  22. unsigned long *id;
  23. {
  24.  direntry *d;
  25.  unsigned int len;
  26.  
  27.  if (!rs->dir)
  28.   {
  29.    if (rs->pos >= auto_split) return 0;
  30.    if (str_len(rs->name) > READSUBDIR_NAMELEN) { rs->pos++; return -1; }
  31.    len = 0;
  32.    len += fmt_str(namepos + len,rs->name);
  33.    namepos[len++] = '/';
  34.    len += fmt_ulong(namepos + len,(unsigned long) rs->pos);
  35.    namepos[len] = 0;
  36.    while (!(rs->dir = opendir(namepos))) rs->pause(namepos);
  37.    rs->pos++;
  38.    return -1;
  39.   }
  40.  
  41.  d = readdir(rs->dir);
  42.  if (!d) { closedir(rs->dir); rs->dir = 0; return -1; }
  43.  
  44.  if (str_equal(d->d_name,".")) return -1;
  45.  if (str_equal(d->d_name,"..")) return -1;
  46.  len = scan_ulong(d->d_name,id);
  47.  if (!len || d->d_name[len]) return -2;
  48.  return 1;
  49. }
  50.